home *** CD-ROM | disk | FTP | other *** search
/ Atari Mega Archive 1 / Atari Mega Archive - Volume 1.iso / mint / lib / mntlib44.zoo / mntlib / purec / osmacros.s < prev    next >
Text File  |  1993-05-23  |  3KB  |  224 lines
  1. GEMDOS        =    1
  2. BIOS        =    13
  3. XBIOS        =    14
  4.  
  5. REGSIZE        equ    4        ; size of the space we need 
  6.                     ; for scrap regs
  7. .MACRO    SYS_    Os,Nr
  8.     pea    (a2)
  9.     move.w    Nr,-(sp)
  10.     trap    #Os
  11.     addq.w    #2,sp
  12.     movea.l    (sp)+,a2
  13.     .ENDM
  14.  
  15. .MACRO    SYS_L    Os,Nr,L1
  16.     pea    (a2)
  17.     move.l    L1,-(sp)
  18.     move.w    Nr,-(sp)
  19.     trap    #Os
  20.     addq.w    #6,sp
  21.     movea.l    (sp)+,a2
  22.     .ENDM
  23.     
  24. .MACRO    SYS_W    Os,Nr,W1
  25.     pea    (a2)
  26.     move.w    W1,-(sp)
  27.     move.w    Nr,-(sp)
  28.     trap    #Os
  29.     addq.w    #4,sp
  30.     movea.l    (sp)+,a2
  31.     .ENDM
  32.     
  33. .MACRO    SYS_WW    Os,Nr,W1,W2
  34.     pea    (a2)
  35.     move.w    W2,-(sp)
  36.     move.w    W1,-(sp)
  37.     move.w    Nr,-(sp)
  38.     trap    #Os
  39.     addq.w    #6,sp
  40.     movea.l    (sp)+,a2
  41.     .ENDM
  42.  
  43. .MACRO    SYS_LW    Os,Nr,L1,W1
  44.     pea    (a2)
  45.     move.w    W1,-(sp)
  46.     move.l    L1,-(sp)
  47.     move.w    Nr,-(sp)
  48.     trap    #Os
  49.     addq.w    #8,sp
  50.     movea.l    (sp)+,a2
  51.     .ENDM
  52.  
  53. .MACRO    SYS_WWW    Os,Nr,W1,W2,W3
  54.     pea    (a2)
  55.     move.w    W3,-(sp)
  56.     move.w    W2,-(sp)
  57.     move.w    W1,-(sp)
  58.     move.w    Nr,-(sp)
  59.     trap    #Os
  60.     addq.w    #8,sp
  61.     movea.l    (sp)+,a2
  62.     .ENDM
  63.  
  64. .MACRO    SYS_WLW    Os,Nr,W1,L1,W2
  65.     pea    (a2)
  66.     move.w    W2,-(sp)
  67.     move.l    L1,-(sp)
  68.     move.w    W1,-(sp)
  69.     move.w    Nr,-(sp)
  70.     trap    #Os
  71.     lea    10(sp),sp
  72.     movea.l    (sp)+,a2
  73.     .ENDM
  74.     
  75. .MACRO    SYS_WL    Os,Nr,W1,L1
  76.     pea    (a2)
  77.     move.l    L1,-(sp)
  78.     move.w    W1,-(sp)
  79.     move.w    Nr,-(sp)
  80.     trap    #Os
  81.     addq.w    #8,sp
  82.     movea.l    (sp)+,a2
  83.     .ENDM
  84.  
  85. .MACRO    SYS_WLL    Os,Nr,W1,L1,L2
  86.     pea    (a2)
  87.     move.l    L2,-(sp)
  88.     move.l    L1,-(sp)
  89.     move.w    W1,-(sp)
  90.     move.w    Nr,-(sp)
  91.     trap    #Os
  92.     lea    12(sp),sp
  93.     movea.l    (sp)+,a2
  94.     .ENDM
  95.  
  96. .MACRO    SYS_WWL    Os,Nr,W1,W2,L1
  97.     pea    (a2)
  98.     move.l    L1,-(sp)
  99.     move.w    W2,-(sp)
  100.     move.w    W1,-(sp)
  101.     move.w    Nr,-(sp)
  102.     trap    #Os
  103.     lea    10(sp),sp
  104.     movea.l    (sp)+,a2
  105.     .ENDM
  106.  
  107. .MACRO    SYS_LWW    Os,Nr,L1,W1,W2
  108.     pea    (a2)
  109.     move.w    W2,-(sp)
  110.     move.w    W1,-(sp)
  111.     move.l    L1,-(sp)
  112.     move.w    Nr,-(sp)
  113.     trap    #Os
  114.     lea    10(sp),sp
  115.     movea.l    (sp)+,a2
  116.     .ENDM
  117.  
  118. .MACRO    SYS_WWWL Os,Nr,W1,W2,W3,L1
  119.     pea    (a2)
  120.     move.l    L1,-(sp)
  121.     move.w    W3,-(sp)
  122.     move.w    W2,-(sp)
  123.     move.w    W1,-(sp)
  124.     move.w    Nr,-(sp)
  125.     trap    #Os
  126.     lea    12(sp),sp
  127.     movea.l    (sp)+,a2
  128.     .ENDM
  129.  
  130. .MACRO    SYS_WWLL Os,Nr,W1,W2,L1,L2
  131.     pea    (a2)
  132.     move.l    L2,-(sp)
  133.     move.l    L1,-(sp)
  134.     move.w    W2,-(sp)
  135.     move.w    W1,-(sp)
  136.     move.w    Nr,-(sp)
  137.     trap    #Os
  138.     lea    14(sp),sp
  139.     movea.l    (sp)+,a2
  140.     .ENDM
  141.  
  142. .MACRO    SYS_WLLL Os,Nr,W1,L1,L2,L3
  143.     pea    (a2)
  144.     move.l    L3,-(sp)
  145.     move.l    L2,-(sp)
  146.     move.l    L1,-(sp)
  147.     move.w    W1,-(sp)
  148.     move.w    Nr,-(sp)
  149.     trap    #Os
  150.     lea    16(sp),sp
  151.     movea.l    (sp)+,a2
  152.     .ENDM
  153.  
  154. .MACRO    SYS_LL    Os,Nr,L1,L2
  155.     pea    (a2)
  156.     move.l    L2,-(sp)
  157.     move.l    L1,-(sp)
  158.     move.w    Nr,-(sp)
  159.     trap    #Os
  160.     lea    10(sp),sp
  161.     movea.l    (sp)+,a2
  162.     .ENDM
  163.  
  164. .MACRO    SYS_LLW    Os,Nr,L1,L2,W1
  165.     pea    (a2)
  166.     move.w    W1,-(sp)
  167.     move.l    L2,-(sp)
  168.     move.l    L1,-(sp)
  169.     move.w    Nr,-(sp)
  170.     trap    #Os
  171.     lea    12(sp),sp
  172.     movea.l    (sp)+,a2
  173.     .ENDM
  174.  
  175. .MACRO    SYS_LLL    Os,Nr,L1,L2,L3
  176.     pea    (a2)
  177.     move.l    L3,-(sp)
  178.     move.l    L2,-(sp)
  179.     move.l    L1,-(sp)
  180.     move.w    Nr,-(sp)
  181.     trap    #Os
  182.     lea    14(sp),sp
  183.     movea.l    (sp)+,a2
  184.     .ENDM
  185.  
  186. .MACRO    SYS_LLWW    Os,Nr,L1,L2,W1,W2
  187.     pea    (a2)
  188.     move.w    W2,-(sp)
  189.     move.w    W1,-(sp)
  190.     move.l    L2,-(sp)
  191.     move.l    L1,-(sp)
  192.     move.w    Nr,-(sp)
  193.     trap    #Os
  194.     lea    14(sp),sp
  195.     movea.l    (sp)+,a2
  196.     .ENDM
  197.  
  198. .MACRO    SYS_LWLW    Os,Nr,L1,W1,L2,W2
  199.     pea    (a2)
  200.     move.w    W2,-(sp)
  201.     move.l    L2,-(sp)
  202.     move.w    W1,-(sp)
  203.     move.l    L1,-(sp)
  204.     move.w    Nr,-(sp)
  205.     trap    #Os
  206.     lea    14(sp),sp
  207.     movea.l    (sp)+,a2
  208.     .ENDM
  209.  
  210. .MACRO    SYS_WLWWW    Os,Nr,W1,L1,W2,W3,W4
  211.     pea    (a2)
  212.     move.w    W4,-(sp)
  213.     move.w    W3,-(sp)
  214.     move.w    W2,-(sp)
  215.     move.l    L1,-(sp)
  216.     move.w    W1,-(sp)
  217.     move.w    Nr,-(sp)
  218.     trap    #Os
  219.     lea    14(sp),sp
  220.     movea.l    (sp)+,a2
  221.     .ENDM
  222.     
  223.  
  224.